home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Westlight Stock Photography - Creative Freedom
/
Westlight Stock Photography - Creative Freedom.iso
/
Place in System Folder
/
System 7.5.2 or higher
/
Finder Scripting Extension
/
Finder Scripting Extension.rsrc
/
CODE_28.txt
< prev
next >
Wrap
Text File
|
1993-04-16
|
21KB
|
381 lines
# near model CODE resource
# jump table entries: 6000-6005 (6 of them)
export_750:
00000000 4E56 0000 link A6, 0
00000004 48E7 0118 movem.l -[A7], D7,A3,A4
00000008 266E 000C movea.l A3, [A6 + 0xC]
0000000C 286E 0008 movea.l A4, [A6 + 0x8]
00000010 4207 clr.b D7
00000012 4AAC 0004 tst.l [A4 + 0x4]
00000016 662C bne +0x2E /* 00000044 */
00000018 2F14 move.l -[A7], [A4]
0000001A 4EAD 183A jsr [A5 + 0x183A /* export_771 */]
0000001E 2940 0008 move.l [A4 + 0x8], D0
00000022 2F0B move.l -[A7], A3
00000024 4EAD 0ABA jsr [A5 + 0xABA /* export_339 */]
00000028 0C80 6E75 6C6C cmpi.l D0, 0x6E756C6C /* 'null' */
0000002E 57C0 seq D0
00000030 4400 neg.b D0
00000032 4880 ext.w D0
00000034 504F addq.w A7, 8
00000036 660C bne +0xE /* 00000044 */
00000038 2F3C FFFF D8F0 move.l -[A7], 0xFFFFD8F0
0000003E 4EAD 07BA jsr [A5 + 0x7BA /* export_243 */]
00000042 584F addq.w A7, 4
label00000044:
00000044 52AC 0004 addq.l [A4 + 0x4], 1
00000048 2F0B move.l -[A7], A3
0000004A 4EAD 0FDA jsr [A5 + 0xFDA /* export_503 */]
0000004E 202C 0004 move.l D0, [A4 + 0x4]
00000052 B0AC 0008 cmp.l D0, [A4 + 0x8]
00000056 584F addq.w A7, 4
00000058 6E1E bgt +0x20 /* 00000078 */
0000005A 2F2E 0010 move.l -[A7], [A6 + 0x10]
0000005E 2F3C 2A2A 2A2A move.l -[A7], 0x2A2A2A2A /* '****' */
00000064 2F2C 0004 move.l -[A7], [A4 + 0x4]
00000068 2F14 move.l -[A7], [A4]
0000006A 2F0B move.l -[A7], A3
0000006C 4EAD 177A jsr [A5 + 0x177A /* export_747 */]
00000070 7E01 moveq.l D7, 0x01
00000072 4FEF 0014 lea.l A7, [A7 + 0x14]
00000076 6018 bra +0x1A /* 00000090 */
label00000078:
00000078 4AAE 0010 tst.l [A6 + 0x10]
0000007C 670A beq +0xC /* 00000088 */
0000007E 206E 0010 movea.l A0, [A6 + 0x10]
00000082 20BC 6E75 6C6C move.l [A0], 0x6E756C6C /* 'null' */
label00000088:
00000088 2F0B move.l -[A7], A3
0000008A 4EAD 139A jsr [A5 + 0x139A /* export_623 */]
0000008E 584F addq.w A7, 4
label00000090:
00000090 4AAE 0014 tst.l [A6 + 0x14]
00000094 670E beq +0x10 /* 000000A4 */
00000096 2F0B move.l -[A7], A3
00000098 4EAD 0CAA jsr [A5 + 0xCAA /* export_401 */]
0000009C 206E 0014 movea.l A0, [A6 + 0x14]
000000A0 2080 move.l [A0], D0
000000A2 584F addq.w A7, 4
label000000A4:
000000A4 1007 move.b D0, D7
000000A6 4CEE 1880 FFF4 movem.l D7,A3,A4, [A6 - 0xC]
000000AC 4E5E unlink A6
000000AE 4E75 rts
export_751:
000000B0 4E56 FFF8 link A6, -0x0008
000000B4 48E7 0308 movem.l -[A7], D6,D7,A4
000000B8 286E 000C movea.l A4, [A6 + 0xC]
000000BC 2D7C 6E75 6C6C FFF8 move.l [A6 - 0x8], 0x6E756C6C /* 'null' */
000000C4 7000 moveq.l D0, 0x00
000000C6 2D40 FFFC move.l [A6 - 0x4], D0
000000CA 41EE FFF8 lea.l A0, [A6 - 0x8]
000000CE 4246 clr.w D6
000000D0 41EE 0018 lea.l A0, [A6 + 0x18]
000000D4 2F20 move.l -[A7], -[A0]
000000D6 2F20 move.l -[A7], -[A0]
000000D8 2F0C move.l -[A7], A4
000000DA 2054 movea.l A0, [A4]
000000DC 2050 movea.l A0, [A0]
000000DE 2268 005C movea.l A1, [A0 + 0x5C]
000000E2 4E91 jsr [A1]
000000E4 2E00 move.l D7, D0
000000E6 2F07 move.l -[A7], D7
000000E8 2F0C move.l -[A7], A4
000000EA 486E FFF8 pea.l [A6 - 0x8]
000000EE 2054 movea.l A0, [A4]
000000F0 2050 movea.l A0, [A0]
000000F2 2268 006C movea.l A1, [A0 + 0x6C]
000000F6 4E91 jsr [A1]
000000F8 486E FFF8 pea.l [A6 - 0x8]
000000FC 4EAD 0ABA jsr [A5 + 0xABA /* export_339 */]
00000100 BE80 cmp.l D7, D0
00000102 4FEF 001C lea.l A7, [A7 + 0x1C]
00000106 6746 beq +0x48 /* 0000014E */
00000108 486E FFF8 pea.l [A6 - 0x8]
0000010C 4EAD 0ABA jsr [A5 + 0xABA /* export_339 */]
00000110 0C80 6C69 7374 cmpi.l D0, 0x6C697374 /* 'list' */
00000116 584F addq.w A7, 4
00000118 6734 beq +0x36 /* 0000014E */
0000011A 486E FFF8 pea.l [A6 - 0x8]
0000011E 4EAD 0ABA jsr [A5 + 0xABA /* export_339 */]
00000122 0C80 6E75 6C6C cmpi.l D0, 0x6E756C6C /* 'null' */
00000128 584F addq.w A7, 4
0000012A 6722 beq +0x24 /* 0000014E */
0000012C 2F07 move.l -[A7], D7
0000012E 486E FFF8 pea.l [A6 - 0x8]
00000132 4EAD 113A jsr [A5 + 0x113A /* export_547 */]
00000136 3C00 move.w D6, D0
00000138 504F addq.w A7, 8
0000013A 6712 beq +0x14 /* 0000014E */
0000013C 486E FFF8 pea.l [A6 - 0x8]
00000140 4EAD 0FDA jsr [A5 + 0xFDA /* export_503 */]
00000144 48C6 ext.l D6
00000146 2F06 move.l -[A7], D6
00000148 4EAD 07BA jsr [A5 + 0x7BA /* export_243 */]
0000014C 504F addq.w A7, 8
label0000014E:
0000014E 206E 0008 movea.l A0, [A6 + 0x8]
00000152 43EE FFF8 lea.l A1, [A6 - 0x8]
00000156 20D9 move.l [A0]+, [A1]+
00000158 20D9 move.l [A0]+, [A1]+
0000015A 4CEE 10C0 FFEC movem.l D6,D7,A4, [A6 - 0x14]
00000160 4E5E unlink A6
00000162 4E75 rts
export_752:
00000164 4E56 FFE8 link A6, -0x0018
00000168 2F0C move.l -[A7], A4
0000016A 286E 000C movea.l A4, [A6 + 0xC]
0000016E 486E FFE8 pea.l [A6 - 0x18]
00000172 4EAD 0B92 jsr [A5 + 0xB92 /* export_366 */]
00000176 2D7C 6E75 6C6C FFF0 move.l [A6 - 0x10], 0x6E756C6C /* 'null' */
0000017E 7000 moveq.l D0, 0x00
00000180 2D40 FFF4 move.l [A6 - 0xC], D0
00000184 41EE FFF0 lea.l A0, [A6 - 0x10]
00000188 2D7C 6E75 6C6C FFF8 move.l [A6 - 0x8], 0x6E756C6C /* 'null' */
00000190 2D40 FFFC move.l [A6 - 0x4], D0
00000194 41EE FFF8 lea.l A0, [A6 - 0x8]
00000198 2054 movea.l A0, [A4]
0000019A 4AA8 0004 tst.l [A0 + 0x4]
0000019E 584F addq.w A7, 4
000001A0 6718 beq +0x1A /* 000001BA */
000001A2 2F28 0004 move.l -[A7], [A0 + 0x4]
000001A6 486E FFF0 pea.l [A6 - 0x10]
000001AA 2068 0004 movea.l A0, [A0 + 0x4]
000001AE 2050 movea.l A0, [A0]
000001B0 2050 movea.l A0, [A0]
000001B2 2268 0060 movea.l A1, [A0 + 0x60]
000001B6 4E91 jsr [A1]
000001B8 504F addq.w A7, 8
label000001BA:
000001BA 2F0C move.l -[A7], A4
000001BC 2054 movea.l A0, [A4]
000001BE 2050 movea.l A0, [A0]
000001C0 2268 000C movea.l A1, [A0 + 0xC]
000001C4 4E91 jsr [A1]
000001C6 588F addq.l A7, 4
000001C8 2F00 move.l -[A7], D0
000001CA 486E FFF8 pea.l [A6 - 0x8]
000001CE 4EAD 101A jsr [A5 + 0x101A /* export_511 */]
000001D2 7001 moveq.l D0, 0x01
000001D4 2F00 move.l -[A7], D0
000001D6 41EE 0000 lea.l A0, [A6 + 0x0]
000001DA 2F20 move.l -[A7], -[A0]
000001DC 2F20 move.l -[A7], -[A0]
000001DE 2F3C 7072 6F70 move.l -[A7], 0x70726F70 /* 'prop' */
000001E4 41EE FFF8 lea.l A0, [A6 - 0x8]
000001E8 2F20 move.l -[A7], -[A0]
000001EA 2F20 move.l -[A7], -[A0]
000001EC 2F3C 7072 6F70 move.l -[A7], 0x70726F70 /* 'prop' */
000001F2 486E FFE8 pea.l [A6 - 0x18]
000001F6 4EAD 0B8A jsr [A5 + 0xB8A /* export_365 */]
000001FA 206E 0008 movea.l A0, [A6 + 0x8]
000001FE 43EE FFE8 lea.l A1, [A6 - 0x18]
00000202 20D9 move.l [A0]+, [A1]+
00000204 20D9 move.l [A0]+, [A1]+
00000206 4FEF 0028 lea.l A7, [A7 + 0x28]
0000020A 286E FFE4 movea.l A4, [A6 - 0x1C]
0000020E 4E5E unlink A6
00000210 4E75 rts
export_753:
00000212 4E56 FFFC link A6, -0x0004
00000216 48E7 0318 movem.l -[A7], D6,D7,A3,A4
0000021A 2E2E 000C move.l D7, [A6 + 0xC]
0000021E 286E 0008 movea.l A4, [A6 + 0x8]
00000222 2F0C move.l -[A7], A4
00000224 2054 movea.l A0, [A4]
00000226 2050 movea.l A0, [A0]
00000228 2268 0090 movea.l A1, [A0 + 0x90]
0000022C 4E91 jsr [A1]
0000022E 2D40 FFFC move.l [A6 - 0x4], D0
00000232 584F addq.w A7, 4
00000234 6700 0086 beq +0x88 /* 000002BC */
00000238 7001 moveq.l D0, 0x01
0000023A B087 cmp.l D0, D7
0000023C 6D08 blt +0xA /* 00000246 */
0000023E 2F2E FFFC move.l -[A7], [A6 - 0x4]
00000242 A91F syscall SelectWindow
00000244 6076 bra +0x78 /* 000002BC */
label00000246:
00000246 598F subq.l A7, 4
00000248 A924 syscall FrontWindow
0000024A 265F movea.l A3, [A7]+
0000024C 200B move.l D0, A3
0000024E 676C beq +0x6E /* 000002BC */
00000250 B7EE FFFC cmpa.l A3, [A6 - 0x4]
00000254 57C0 seq D0
00000256 0240 0001 andi.w D0, 0x1
0000025A 48C0 ext.l D0
0000025C 1C00 move.b D6, D0
0000025E 284B movea.l A4, A3
00000260 266B 0090 movea.l A3, [A3 + 0x90]
00000264 B7EE FFFC cmpa.l A3, [A6 - 0x4]
00000268 6602 bne +0x4 /* 0000026C */
0000026A 7C01 moveq.l D6, 0x01
label0000026C:
0000026C 2007 move.l D0, D7
0000026E 5387 subq.l D7, 1
00000270 6012 bra +0x14 /* 00000284 */
label00000272:
00000272 284B movea.l A4, A3
00000274 266B 0090 movea.l A3, [A3 + 0x90]
00000278 2007 move.l D0, D7
0000027A 5387 subq.l D7, 1
0000027C B7EE FFFC cmpa.l A3, [A6 - 0x4]
00000280 6602 bne +0x4 /* 00000284 */
00000282 7C01 moveq.l D6, 0x01
label00000284:
00000284 200B move.l D0, A3
00000286 6706 beq +0x8 /* 0000028E */
00000288 7001 moveq.l D0, 0x01
0000028A B087 cmp.l D0, D7
0000028C 6DE4 blt -0x1A /* 00000272 */
label0000028E:
0000028E B7EE FFFC cmpa.l A3, [A6 - 0x4]
00000292 6728 beq +0x2A /* 000002BC */
00000294 4A06 tst.b D6
00000296 670A beq +0xC /* 000002A2 */
00000298 2F2E FFFC move.l -[A7], [A6 - 0x4]
0000029C 2F0B move.l -[A7], A3
0000029E A921 syscall SendBehind
000002A0 6008 bra +0xA /* 000002AA */
label000002A2:
000002A2 2F2E FFFC move.l -[A7], [A6 - 0x4]
000002A6 2F0C move.l -[A7], A4
000002A8 A921 syscall SendBehind
label000002AA:
000002AA 206E FFFC movea.l A0, [A6 - 0x4]
000002AE 2F08 move.l -[A7], A0
000002B0 2F28 0072 move.l -[A7], [A0 + 0x72]
000002B4 A90C syscall PaintOne
000002B6 2F2E FFFC move.l -[A7], [A6 - 0x4]
000002BA A909 syscall CalcVis
label000002BC:
000002BC 4CEE 18C0 FFEC movem.l D6,D7,A3,A4, [A6 - 0x14]
000002C2 4E5E unlink A6
000002C4 4E75 rts
export_754:
000002C6 4E56 FFAC link A6, -0x0054
000002CA 2F07 move.l -[A7], D7
000002CC 206E 001C movea.l A0, [A6 + 0x1C]
000002D0 43EE FFF0 lea.l A1, [A6 - 0x10]
000002D4 22D8 move.l [A1]+, [A0]+
000002D6 22D8 move.l [A1]+, [A0]+
000002D8 206E 0010 movea.l A0, [A6 + 0x10]
000002DC 43EE FFF8 lea.l A1, [A6 - 0x8]
000002E0 22D8 move.l [A1]+, [A0]+
000002E2 22D8 move.l [A1]+, [A0]+
000002E4 202D FD6A move.l D0, [A5 - 0x296]
000002E8 C0BC 0000 0010 and.l D0, 0x10
000002EE 486E FFE8 pea.l [A6 - 0x18]
000002F2 4EAD 1DBA jsr [A5 + 0x1DBA /* export_947 */]
000002F6 4247 clr.w D7
000002F8 486E FFAC pea.l [A6 - 0x54]
000002FC 4EAD 007A jsr [A5 + 0x7A /* export_11 */]
00000300 4A80 tst.l D0
00000302 504F addq.w A7, 8
00000304 6742 beq +0x44 /* 00000348 */
00000306 486E FFE8 pea.l [A6 - 0x18]
0000030A 4EAD 0B82 jsr [A5 + 0xB82 /* export_364 */]
0000030E 558F subq.l A7, 2
00000310 2F2E 0020 move.l -[A7], [A6 + 0x20]
00000314 486E FFE8 pea.l [A6 - 0x18]
00000318 2F2E 0018 move.l -[A7], [A6 + 0x18]
0000031C 2F2E 0014 move.l -[A7], [A6 + 0x14]
00000320 486E FFF8 pea.l [A6 - 0x8]
00000324 2F2E 000C move.l -[A7], [A6 + 0xC]
00000328 2F2E 0008 move.l -[A7], [A6 + 0x8]
0000032C 4EAD 1BDA jsr [A5 + 0x1BDA /* export_887 */]
00000330 301F move.w D0, [A7]+
00000332 48C0 ext.l D0
00000334 2F00 move.l -[A7], D0
00000336 4EAD 07BA jsr [A5 + 0x7BA /* export_243 */]
0000033A 486E FFE8 pea.l [A6 - 0x18]
0000033E 4EAD 18AA jsr [A5 + 0x18AA /* export_785 */]
00000342 4FEF 000C lea.l A7, [A7 + 0xC]
00000346 6010 bra +0x12 /* 00000358 */
label00000348:
00000348 486E FFE8 pea.l [A6 - 0x18]
0000034C 4EAD 18AA jsr [A5 + 0x18AA /* export_785 */]
00000350 4EAD 0082 jsr [A5 + 0x82 /* export_12 */]
00000354 3E00 move.w D7, D0
00000356 584F addq.w A7, 4
label00000358:
00000358 486E FFAC pea.l [A6 - 0x54]
0000035C 4EAD 07CA jsr [A5 + 0x7CA /* export_245 */]
00000360 3D47 0024 move.w [A6 + 0x24], D7
00000364 584F addq.w A7, 4
00000366 2E2E FFA8 move.l D7, [A6 - 0x58]
0000036A 4E5E unlink A6
0000036C 205F movea.l A0, [A7]+
0000036E 4FEF 001C lea.l A7, [A7 + 0x1C]
00000372 4ED0 jmp [A0]
export_755:
00000374 4E56 0000 link A6, 0
00000378 48E7 0118 movem.l -[A7], D7,A3,A4
0000037C 1E2E 000F move.b D7, [A6 + 0xF]
00000380 286E 0008 movea.l A4, [A6 + 0x8]
00000384 4EAD 137A jsr [A5 + 0x137A /* export_619 */]
00000388 2F0C move.l -[A7], A4
0000038A 2054 movea.l A0, [A4]
0000038C 2050 movea.l A0, [A0]
0000038E 2268 0090 movea.l A1, [A0 + 0x90]
00000392 4E91 jsr [A1]
00000394 2640 movea.l A3, D0
00000396 4878 4362 push.l 0x4362 /* 'Cb' */
0000039A 2F0B move.l -[A7], A3
0000039C 2053 movea.l A0, [A3]
0000039E 2050 movea.l A0, [A0]
000003A0 2268 000C movea.l A1, [A0 + 0xC]
000003A4 4E91 jsr [A1]
000003A6 4A00 tst.b D0
000003A8 4FEF 000C lea.l A7, [A7 + 0xC]
000003AC 671C beq +0x1E /* 000003CA */
000003AE 7000 moveq.l D0, 0x00
000003B0 1007 move.b D0, D7
000003B2 2F00 move.l -[A7], D0
000003B4 4878 4397 push.l 0x4397
000003B8 2F0B move.l -[A7], A3
000003BA 2053 movea.l A0, [A3]
000003BC 2050 movea.l A0, [A0]
000003BE 2268 007C movea.l A1, [A0 + 0x7C]
000003C2 4E91 jsr [A1]
000003C4 4FEF 000C lea.l A7, [A7 + 0xC]
000003C8 6050 bra +0x52 /* 0000041A */
label000003CA:
000003CA 4878 2BF2 push.l 0x2BF2
000003CE 2F0B move.l -[A7], A3
000003D0 2053 movea.l A0, [A3]
000003D2 2050 movea.l A0, [A0]
000003D4 2268 000C movea.l A1, [A0 + 0xC]
000003D8 4E91 jsr [A1]
000003DA 4A00 tst.b D0
000003DC 504F addq.w A7, 8
000003DE 673A beq +0x3C /* 0000041A */
000003E0 7000 moveq.l D0, 0x00
000003E2 1007 move.b D0, D7
000003E4 2F00 move.l -[A7], D0
000003E6 4878 2C49 push.l 0x2C49 /* ',I' */
000003EA 2F0B move.l -[A7], A3
000003EC 2053 movea.l A0, [A3]
000003EE 2050 movea.l A0, [A0]
000003F0 2268 007C movea.l A1, [A0 + 0x7C]
000003F4 4E91 jsr [A1]
000003F6 2F0B move.l -[A7], A3
000003F8 4EAD 09DA jsr [A5 + 0x9DA /* export_311 */]
000003FC 7000 moveq.l D0, 0x00
000003FE 2F00 move.l -[A7], D0
00000400 2F0B move.l -[A7], A3
00000402 2053 movea.l A0, [A3]
00000404 2050 movea.l A0, [A0]
00000406 2268 011C movea.l A1, [A0 + 0x11C]
0000040A 4E91 jsr [A1]
0000040C 7000 moveq.l D0, 0x00
0000040E 2F00 move.l -[A7], D0
00000410 2F0B move.l -[A7], A3
00000412 4EAD 07F2 jsr [A5 + 0x7F2 /* export_250 */]
00000416 4FEF 0020 lea.l A7, [A7 + 0x20]
label0000041A:
0000041A 4CEE 1880 FFF4 movem.l D7,A3,A4, [A6 - 0xC]
00000420 4E5E unlink A6
00000422 4E75 rts